\(\int (c x)^m (a+b x^3)^{4/3} \, dx\) [595]

Optimal result

Integrand size = 17, antiderivative size = 69 \[ \int (c x)^m \left (a+b x^3\right )^{4/3} \, dx=\frac {a (c x)^{1+m} \sqrt [3]{a+b x^3} \operatorname {Hypergeometric2F1}\left (-\frac {4}{3},\frac {1+m}{3},\frac {4+m}{3},-\frac {b x^3}{a}\right )}{c (1+m) \sqrt [3]{1+\frac {b x^3}{a}}} \]

[Out]

a*(c*x)^(1+m)*(b*x^3+a)^(1/3)*hypergeom([-4/3, 1/3+1/3*m],[4/3+1/3*m],-b*x^3/a)/c/(1+m)/(1+b*x^3/a)^(1/3)

Rubi [A] (verified)

Time = 0.02 (sec) , antiderivative size = 69, normalized size of antiderivative = 1.00, number of steps used = 2, number of rules used = 2, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.118, Rules used = {372, 371} \[ \int (c x)^m \left (a+b x^3\right )^{4/3} \, dx=\frac {a \sqrt [3]{a+b x^3} (c x)^{m+1} \operatorname {Hypergeometric2F1}\left (-\frac {4}{3},\frac {m+1}{3},\frac {m+4}{3},-\frac {b x^3}{a}\right )}{c (m+1) \sqrt [3]{\frac {b x^3}{a}+1}} \]

[In]

Int[(c*x)^m*(a + b*x^3)^(4/3),x]

[Out]

(a*(c*x)^(1 + m)*(a + b*x^3)^(1/3)*Hypergeometric2F1[-4/3, (1 + m)/3, (4 + m)/3, -((b*x^3)/a)])/(c*(1 + m)*(1
+ (b*x^3)/a)^(1/3))

Rule 371

Int[((c_.)*(x_))^(m_.)*((a_) + (b_.)*(x_)^(n_))^(p_), x_Symbol] :> Simp[a^p*((c*x)^(m + 1)/(c*(m + 1)))*Hyperg
eometric2F1[-p, (m + 1)/n, (m + 1)/n + 1, (-b)*(x^n/a)], x] /; FreeQ[{a, b, c, m, n, p}, x] &&  !IGtQ[p, 0] &&
(ILtQ[p, 0] || GtQ[a, 0])

Rule 372

Int[((c_.)*(x_))^(m_.)*((a_) + (b_.)*(x_)^(n_))^(p_), x_Symbol] :> Dist[a^IntPart[p]*((a + b*x^n)^FracPart[p]/
(1 + b*(x^n/a))^FracPart[p]), Int[(c*x)^m*(1 + b*(x^n/a))^p, x], x] /; FreeQ[{a, b, c, m, n, p}, x] &&  !IGtQ[
p, 0] &&  !(ILtQ[p, 0] || GtQ[a, 0])

Rubi steps \begin{align*} \text {integral}& = \frac {\left (a \sqrt [3]{a+b x^3}\right ) \int (c x)^m \left (1+\frac {b x^3}{a}\right )^{4/3} \, dx}{\sqrt [3]{1+\frac {b x^3}{a}}} \\ & = \frac {a (c x)^{1+m} \sqrt [3]{a+b x^3} \, _2F_1\left (-\frac {4}{3},\frac {1+m}{3};\frac {4+m}{3};-\frac {b x^3}{a}\right )}{c (1+m) \sqrt [3]{1+\frac {b x^3}{a}}} \\ \end{align*}

Mathematica [A] (verified)

Time = 0.12 (sec) , antiderivative size = 67, normalized size of antiderivative = 0.97 \[ \int (c x)^m \left (a+b x^3\right )^{4/3} \, dx=\frac {a x (c x)^m \sqrt [3]{a+b x^3} \operatorname {Hypergeometric2F1}\left (-\frac {4}{3},\frac {1+m}{3},1+\frac {1+m}{3},-\frac {b x^3}{a}\right )}{(1+m) \sqrt [3]{1+\frac {b x^3}{a}}} \]

[In]

Integrate[(c*x)^m*(a + b*x^3)^(4/3),x]

[Out]

(a*x*(c*x)^m*(a + b*x^3)^(1/3)*Hypergeometric2F1[-4/3, (1 + m)/3, 1 + (1 + m)/3, -((b*x^3)/a)])/((1 + m)*(1 +
(b*x^3)/a)^(1/3))

Maple [F]

\[\int \left (c x \right )^{m} \left (b \,x^{3}+a \right )^{\frac {4}{3}}d x\]

[In]

int((c*x)^m*(b*x^3+a)^(4/3),x)

[Out]

int((c*x)^m*(b*x^3+a)^(4/3),x)

Fricas [F]

\[ \int (c x)^m \left (a+b x^3\right )^{4/3} \, dx=\int { {\left (b x^{3} + a\right )}^{\frac {4}{3}} \left (c x\right )^{m} \,d x } \]

[In]

integrate((c*x)^m*(b*x^3+a)^(4/3),x, algorithm="fricas")

[Out]

integral((b*x^3 + a)^(4/3)*(c*x)^m, x)

Sympy [C] (verification not implemented)

Result contains complex when optimal does not.

Time = 3.14 (sec) , antiderivative size = 58, normalized size of antiderivative = 0.84 \[ \int (c x)^m \left (a+b x^3\right )^{4/3} \, dx=\frac {a^{\frac {4}{3}} c^{m} x^{m + 1} \Gamma \left (\frac {m}{3} + \frac {1}{3}\right ) {{}_{2}F_{1}\left (\begin {matrix} - \frac {4}{3}, \frac {m}{3} + \frac {1}{3} \\ \frac {m}{3} + \frac {4}{3} \end {matrix}\middle | {\frac {b x^{3} e^{i \pi }}{a}} \right )}}{3 \Gamma \left (\frac {m}{3} + \frac {4}{3}\right )} \]

[In]

integrate((c*x)**m*(b*x**3+a)**(4/3),x)

[Out]

a**(4/3)*c**m*x**(m + 1)*gamma(m/3 + 1/3)*hyper((-4/3, m/3 + 1/3), (m/3 + 4/3,), b*x**3*exp_polar(I*pi)/a)/(3*
gamma(m/3 + 4/3))

Maxima [F]

\[ \int (c x)^m \left (a+b x^3\right )^{4/3} \, dx=\int { {\left (b x^{3} + a\right )}^{\frac {4}{3}} \left (c x\right )^{m} \,d x } \]

[In]

integrate((c*x)^m*(b*x^3+a)^(4/3),x, algorithm="maxima")

[Out]

integrate((b*x^3 + a)^(4/3)*(c*x)^m, x)

Giac [F]

\[ \int (c x)^m \left (a+b x^3\right )^{4/3} \, dx=\int { {\left (b x^{3} + a\right )}^{\frac {4}{3}} \left (c x\right )^{m} \,d x } \]

[In]

integrate((c*x)^m*(b*x^3+a)^(4/3),x, algorithm="giac")

[Out]

integrate((b*x^3 + a)^(4/3)*(c*x)^m, x)

Mupad [F(-1)]

Timed out. \[ \int (c x)^m \left (a+b x^3\right )^{4/3} \, dx=\int {\left (c\,x\right )}^m\,{\left (b\,x^3+a\right )}^{4/3} \,d x \]

[In]

int((c*x)^m*(a + b*x^3)^(4/3),x)

[Out]

int((c*x)^m*(a + b*x^3)^(4/3), x)